home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Aminet 30
/
Aminet 30 (1999)(Schatztruhe)[!][Apr 1999].iso
/
Aminet
/
util
/
dtype
/
PCD-DT.lha
/
PCD-DT
/
Install
next >
Wrap
Text File
|
1998-10-20
|
2KB
|
122 lines
;$VER pcd.datatype Install 43.9
(set #dt-dir
(askdir
(prompt "Where do you store your datatypes ?")
(help @askdir-help)
(default "SYS:Classes/DataTypes")
)
)
(set #dc-dir
(askdir
(prompt "Where do you store your descriptor files ?")
(help @askdir-help)
(default "DEVS:DataTypes")
)
)
(set #c-dir
(askdir
(prompt "This datatype requires the PCD decoder 'pcdtoppm',\nwhich MUST be available in your path !\nWhere do you want to store the decoder ?")
(help @askdir-help)
(default "C:")
)
)
(set #prefs-dir
(askdir
(prompt "Where do you store your preferences for datatypes ?")
(help @askdir-help)
(default "SYS:Prefs/DataTypes")
)
)
(set #lib 0)
(if (not (patmatch "68881|68882|FPU040" (database "fpu")))
(
(if (patmatch "68020|68030|68040" (database "cpu"))
(
(set #lib 1)
)
)
(if (patmatch "68060" (database "cpu"))
(
(set #lib 2)
)
)
)
)
(set #libname
(select
(askchoice
(prompt "Select the type of CPU/FPU combination for the render.library")
(choices "68020/030 without FPU" "68020/030 with FPU or 68040" "68060")
(default #lib)
(help @askchoice-help)
)
"render.library" "render.library_68040" "render.library_68060"
)
)
(set #icon
(askchoice
(prompt "What type of icons do you want to use ?")
(help @askchoice-help)
(choices "MWB style (8 colors)" "NewIcons style")
)
)
(copylib
(prompt "PCD Datatype Version Checking")
(source "Classes/DataTypes/pcd.datatype")
(dest #dt-dir)
(help @copylib-help)
(confirm)
)
(copylib
(prompt "render.library Version Checking")
(source (tackon "Libs" #libname))
(dest "LIBS:")
(newname "render.library")
(help @copylib-help)
(confirm)
)
(copyfiles
(source "Devs/DataTypes/PCD")
(dest #dc-dir)
)
(copyfiles
(source "C/pcdtoppm")
(dest #c-dir)
)
(copyfiles
(source "Env/DataTypes/pcd.prefs")
(dest "ENVARC:DataTypes")
)
(copyfiles
(source "Env/DataTypes/pcd.prefs")
(dest "ENV:DataTypes")
)
(copyfiles
(source "Prefs/PCDPrefs")
(dest #prefs-dir)
(infos)
)
(if (= #icon 1)
(
(copyfiles
(source "NewIcons/Tool.info")
(dest #prefs-dir)
(newname "PCDPrefs.info")
)
)
)